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Abstract. It is known after Jouanolou that a general holomorphic foliation of 
degree > 2 in projective space has no algebraic leaf. We give formulas for the 
degrees of the subvarieties of the parameter space of one-dimensional foliations 
that correspond to foliations endowed with some invariant subvariety of degree 
1 or 2 and dimension > 1. 



Introduction 

lomorphic foliations are an offspring of the geometric theory of polynomial 
difSential equations. Following the trend of many branches in Mathematics, in- 
terest has migrated to global aspects. Instead of focusing on just one curve, or 
sur&e, or metric, or differential equation, try and study their family in a suitable 
parameter space. The geometry within the parameter space of the family acquires 
rele^nce. For instance, the family of hypersurfaces of a given degree correspond 
to points in a suitable projective space; geometric conditions imposed on hyper- 
sufTSccs , e.g., to be singular, usually correspond to interesting subvarieties in the 
pajarneter space, e.g., the discriminant. Hilbert schemes have their counterpart in 
the^theory of polynomial differential equations, to wit, the spaces of foliations. 
; Let 'us recall that, while a general surface of degree d > 4 in P 3 contains no line 
-ip-fact, only complete intersection curves are allowed, those that do contain some 
lin^porrespond to a subvariety of codimension d — 3 and degree ( d ~^ 1 ) (3d 4 + 6d 3 + 
17r^+ 22d + 24) /4! in a suitable F N . 

Sjjnilarly, while a general holomorphic foliation, say in P 2 , of degree d > 2 has no 
algebraic leaf, those that do have, say an invariant line, correspond to a subvariety 
cfrcodimension d — 1 and degree 3( d ^ 3 ) in a suitable P N . 

^ir goal is to give similar closed formulas for the degrees of the subvarieties of 
the parameter space of one-dimensional foliations of degree d on P ra that correspond 
to foliations endowed with some invariant subvariety of degree 1 or 2 and dimension 
> 1. Imposing a linear invariant subvariety is easy, essentially due to the absence 
of degenerations. The classical spaces of complete quadrics help us handle the 
quadratic case. For higher degree, we don't know the answer. 



1. THE SPACE OF FOLIATIONS 

The main reference for this matterial is Jouanolou [7] . We call a vector field of 
degree d in P" a global section of TP" ® Op™ (d— 1), for some d > 0. 
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Denote by Sd the space Sym d (C n+1 ) v of homogeneous polynomials of degree d 
in the variables zq, . . . , z n . We write di = d/dzi, thought of as a vector field basis 
for C" +1 = Si . Recalling Euler sequence 

-> pn {d - 1) — ► Opn(d) x C' 1+1 — > TP n (d - 1) -> 

and taking global sections we get the exact sequence 

(1) -> 5 d _i 5 d <8 5i v — > VJ 1 := ff°(P n ,TP n (d - 1)) — » 0. 

Here i(-ff) = if R, with i? = ^ Zidi the radial vector field. Any degree d vector 
field X e can be written in homogeneous coordinates as 

(2) X = F d + --- + F n d n , 

where the F^s denote homogeneous polynomials of degree d, modulo multiples of 
the radial vector field. A vector field X induces a distribution of directions in TF n . 
Any nonzero multiple of X yields the same distribution. 

The space of foliations of degree d in P n is the projective space 

(3) p n = p(y d n ) 

of dimension 

^v=(n+i)( d r)-( rf+ r 1 )- 1 - 

We shall often abuse notation and denote by the same symbol X both the foliation 
and a vector field. The singular scheme of X is the scheme of zeros of the section 
X : -> TP n {d - 1). With X as in (2), the singular scheme is given by the 2x2 
minors of the matrix 

( F Fx ■■■ F n \ 
\ z zi ■■■ z n J ' 

1.1. Invariant subvarieties. Let X be a foliation in F n . An irreducible subva- 
riety Z C P n is said to be invariant by X if 

X( P ) e T p z 

for all p € Z \ (Sing(Z) U Sing(X)). If Z is reducible, it is invariant by X if and 
only if each irreducible component of Z is invariant by X . If Z is defined by a 
saturated ideal Iz ■= (Gi, . . . , G r ), invariance means 

dGi(X) - X(Gi) e I z 

for all i = 1, . . . , r. The hypothesis of saturation is necessary, see [3, p. 5]. It can 
be easily checked that the condition above does not depend on the representative 
of X in Sd® SX- 

2. Foliations with an invariant fc-PLANE 

We show that the locus in P N corresponding to foliations with an invariant k- 
plane is the birational image of a natural projective bundle over the grassmannian 
of fc-planes in P". 

2.1. Consider the tautological exact sequence of vector bundles over the grassman- 
nian G := G(k, n) of projective fc-planes in P™, 

(4) O^T^Gx C n+1 -»• Q -> 
where T is of rank k + 1. The projcctivization 

P(T) = {(W,p) e G x P" | p e W} 
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is the universal k-plane. Write the projection maps 



P(T) cGxP 




We denote by M the normal bundle to P(T) in G x P™. We have the exact sequence 
over P(T), 

(5) -> T P(r)/6 -> p* 2 TF n -> -> 0. 

It is easy to see that 

AA = p*Q® r (l). 

2.2. Proposition. Notation as in (1) and (4), i/iere exists a vector subbundle 

£ C G x yj l 

smc/i £/ia£ 

(i) P(£) = {{W,X) e & x¥ N \W is invariant by X}. 

Set Y := q 2 (V(£)), where q 2 : P(£) F N is the projection. Then 

(ii) the codimension ofY in V N is (n — fc)(( "t ) — (k + 1)) and 
(hi) i/ie degree ofY is given by the top- dimensional Chern class, 

c g {Q® Sym d (T v )) 

where g := dimG. 

Proof. Consider the following diagram of maps of vector bundles over P(7~), 

Tp(T)/&(d - 1) 
y 

y« = H°(¥ n ,TF n (d - 1)) e " > p* 2 TF n (d - 1) 




pJQ®O r (d). 

The map of evaluation yields a surjective map of vector bundles 

The kernel of ip is the vector bundle 

kevip = {(W,p,X) | X(p) G T P W}. 

Observe that a /c-plane W is invariant by X if and only if (W,p,X) G ker<^ for 
all p G 14 7 = Put in other words, we ask (p to vanish along the fibers of 

Pi : P(T) — >• G. It follows from [1, p. 16] that there exists a map of vector bundles 
over G, 

( 9 ) ^ : Vy ^-Pi*(PiQ® O r (d)) = Q®Sym d (r v ) 

such that 

£ := kcr(^ b ) = {(W, X) | Af(p) G T p VF Mp G W}. 
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The projectivization P(£) C G x V N is clearly as stated in (i). Let qi : P(£) -> G 
and q 2 : P(£) ->■ P w be the maps induced by projection. It can be shown that 
<72 : P(£) — > P w is gencrically injective: the general vector field of degree d > 2 with 
an invariant fc-plane has exactly one invariant fc-plane. Write H for the hyperplane 
class of V N . Set u = dimY = dimP(£). We have q* 2 H = CxOg(l) =: ft. We may 
compute 

dcgY= [ H U HY= [ h u = [ qx*(h u )= [ a g (£). 

JP N J¥{E) J& J& 

The assertions (ii) and (iii) follow noticing that the Segre class satisfies 

s g (£) T c g (Q®Sym d (T v )) 
in view of the exact sequence arising from 

£ > V$ Q ® Sym d (T v ). 



□ 



In the case of invariant hyperplane (i.e., k = n — 1) we have explicitly 



2.3. Theorem. TTie degree of the subvariety Y of the space of foliations in P™ iftai 
admit an invariant hyperplane is given by 



dcgY 



□ 



Proof. We have the following exact sequence over G(n — 1, n) = P", 

-> S d _i ® Q v -> 5 d = Sym d (C" +1 ) v -> Sym d (T v ) -> 0. 

Twisting by Q = Oj»„(l) we obtain: 

-> S* d _i ->• 5 d ® Q -> Sym d (T v ) ® Q -> 0. 

From this we can compute c TI (Sym d (T v ) ® Q) = c n (Sd ® Q). Setting H = ci(Q), 
the hyperplane class in P n , the sought for degree is just the coefficient of H n in 
(1 + □ 

To compute c g (Q ® Sym ci (7 -V )) for any fixed k, n, see the script in § 5. 

3. Foliations with an invariant conic in P 2 

We construct a compactification of the space of foliations that leave invariant 
a smooth conic. This compactification is obtained as the birational image of a 
projective bundle over the variety of complete conies. 

3.1. The incidence variety. The parameter space for the family of conies is 
P 5 = P(S-2)- We have the natural trilinear map 

S 2 ® S d ® S% -> S d+ i 
G®F®d t ^ (d l G)F. 
It induces the map of vector bundles over P 5 , 

tp: O^-l)®^®^ -+S d+1 
given by ip(G, X) := X(G) = ^2 FidiG, where G is the equation of the conic and 
X = J2 Fidii Fi £ S d . 

Notice that <p(G,HR) = 2GH, for all H E S d -i. Recalling (1), 

V d n = S d ® S^/S d -!R 
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Sd 



-1 



we see that tp induces a map 

V>:Q p5 (-l)®y d " — ► - 

This maps fits into the commutative diagram, 

(6) kerip = 



P5 (-1) H S d -i ■ R> ^ 0p 5 (-l) ® 5 d ® S x v 



5dH 



P 5(-l)®5 d _i> 

Twisting by Ops(l) we obtain 
(7) 

Sd-i ■ R > 



keri/> 



OpB(-l)i»Sd_i ' 



where 



S d ® 



P 5(l)®5 d+ i 



:=ker(9~7W 



■7W 



Op5(l)0Sd4 



ker 9. 



The map 9 : Sd ® — > Ops(l) (g> Sd+i appearing in (7) is surjective only over 
the open subset consisting of smooth conies. In fact, for G G P 5 the rank of the 
image of 9q depends on the singularities of the conic: 



rank#G = 



The minimal rank, r 



total, ( d ~^ 3 ) , if G is smooth; 

( d ~2 3 ) ~ 1> if G is a line pair; 

rank Sym d = ( d ^ 2 ) , if G is a double line. 

) , is achieved along 

V:=i^(P(5i)) CP(5 2 ), 



the Veronese variety of double lines. It turns out that over the open subset 

U C P 5 \ V 

of smooth conies, the restriction Aijj is a vector subbundle of the trivial bundle 
V#. The projectivization P(A / f[/) is the incidence variety 

{(C,X) | C is invariant by A 7 } C U x P w . 

Let us denote by Y the closure of its image in P . We see that Y consists of (limits 
of) foliations that admit an invariant smooth conic. Our strategy to find its degree 
is summarized in the following. 
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3.2. Theorem. Let n : B — > P 5 be the blowup o/P 5 along the Veronese V. There 
exists a subbundle 

£ C B x VI 1 

such that the restriction £ v -^u coincides with tt*Mu (cf. 7). In particular, the 
image ofP(£) in ¥ N = P(VJ l ) is equal to Y. 

Proof. Consider the pullback by n of the maps (p and ip (cf. 6) 

ip M : 7r*(Op6(-l) ® 5 d (g) 5j v ) 7r*5 d+ i, 

V^b : 7r*(0p.(-l) ® Vy -> ^( a^Xt-!) )- 

By Lemma 3.3 below it's enough to prove that the k x k minors of </? B are locally 
principal for all k > 1. Indeed, in this case J7" := Imt^B is locally free. Therefore we 
obtain a factorization of wh. 



7T*(0 P 5(-l)®S' d ®5 1 V ) 




and 7r*(Ojp5(-l) ® = ^ B (7r*(0 P 5(-l) ® S d -i ■ R)) C J. This factorization 

induces a factorization of "0b 



7t*(cM-i)®V2 1 




where 



is a vector bundle. Define 



J := 



J 



P 5(-l)®7T*(S d _l) 



(8) 



£ := tt*0 P 5(1) ®ken/>. 



x V d ™ that coincides with ir*A4 over the 



It follows that £ is a subbundle of 

open set 7r _1 ([7), where f7 C P 5 is the open set of smooth conies. Indeed, over 
7r _1 (C7) = U the map 

7f * f Sd+i 

is an isomorphism. Therefore kcr?/> = ker^B over {/. 

To prove that the kxk minors of a local matrix representation of </?b are principal 
for all k > 1, consider 

tpo : P5 (-1) ® 5 X V S*i, 

the universal symmetric map that gives the matrix of the conic. We are blowing- 
up the Veronese, which is the scheme of zeros of the ideal of 2 x 2-minors of c/?o- 
Therefore, up on B, we have that the 2x2 minors of (pon are locally principal, say 
generated by t. Thus we can write the matrix of tpo locally in the form A = ( o t o ) 
(cf. [10]). Let C = Z(zq + tz\ + tsz%) be the associated conic. 
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Choosing an appropriate ordering of the basis of Sd ® S± and of Sd+i the matrix 
of ipc can be put in the following form: 

24( d ) B 1 B 3 
2tl d+1 B 4 
2is 

where all the entries of B\ are multiples of t, and the entries of B 3 , B4 are multiples 
of ts. Here I m stands for the identity matrix of size m, andn(d) = ( d + 2 ). It follows 
that the ideals Ji of i x i-minors of Ad arc: 

J, = (1) for i = 1, . . . , n(d); 

J n (d)+j = (&) for j = 1, . . . , d + 1; 

In particular these minors are principal as claimed. □ 

3.3. Lemma. Let R be a local Noetherian domain, and (p : R n — > R m a ho- 

momorphism of free, finitely generated R-modules. Suppose that the ideals (k x 
k minors of tp) are principal for all k. Then J := Imtp is free. 

Proof. Let 

(an ■■■ aire \ 
■.■:■:) 
»ni ■■■ a m „ / 

be the m x n matrix associated to tp, i.e. the columns of A generate J . By 
hypotheses for k — 1, the ideal of cocmcients of A is principal: 

(an, . . . , aij , . . . , a mn ) = (b) 
We may assume b ^ 0. Let bij := We may suppose an = b. Let J' be the 
module generated by the columns of 

-(:•:•). 

\b m i ... b mn J 

Equivalently (by elementary operations) J 1 is generated by the columns of ( J °, ) , 
where 

(022 ■■■ b 2m \ 
: •• ; • 
b m2 ... b mn J 

Applying the inductive hypotheses, we have that ImB' is free. Thus J' is free. 
Since R is a domain we have J = fej'' ~ J' and we conclude that J is free. □ 

3.4. Remark. The variety B is the well known variety of complete conies (see [9], 
[11]). It is constructed to solve the indeterminacies of the map 

e x : P 5 — -> P" 5 

2 

sending a conic to the envelope of its tangent lines. Equivalently e\(A) —A A, where 
A is the symmetric matrix of the conic. We have that B is equal to the closure of 
the graph of ei in P 5 x P~ 5 . 

3.5. A parameter space for foliations with invariant smooth conic. 

Consider the projective bundle associated to £ cf. (3.2, p. 6), and let (fe : P(£) — > 
V N denote the projection. Then 

Y = q 2 {F(£)) CP" 

is a compactification for the parameter space of foliations with an invariant smooth 
conic. It's not difficult to show that qi is generically injective, so the degree of Y 
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is given by the top dimensional Segre class ss(£). It will be computed using Bott's 
formula. 

3.6. Theorem. Notation as above, let Y be the compactification for the parameter 
space of 1- dimensional foliations of degree d on P 2 with an invariant smooth conic. 
Then the degree of Y is given by 

— (d - l)d(d + l)(d 7 + 25d 6 + 231d 5 + 795d 4 + 1856d 3 + 2468d 2 + 2256d + 768) 
and its codimension is equal to 2(d — 1). 

Proof. From the definition of £ (cf. 3.2) we see that rank(£) = d(d + 2). As q2 is 
generically injective it is easy to see that cod Y = 2{d — I). 
To compute the degree we use Bott's formula, 



(9) Js 5 (£)n[M}= 



(cf. [2]) where the torus T := C* acts on B with isolated fixed points. We recall 
that each T-equivariant Chern class cf appearing in the left hand side is simply 
the i-th symmetric function on the weights of the fiber of the vector bundle at the 
fixed point. The action of T on B is induced by the action of T on Si, given by 

for a suitable choice of weights wq,Wi,W2 £ Z. This action induces actions on 

P(5i), on P(S 2 ) = P 5 and on P(Sym 2 A Si) = P' 5 in such a way that the map 
e\ : P 5 — » P 5 (see 3.4) is T-equivariant. Thus we obtain an action of T on B = 
closure of Graph ei C P 5 x P 5 . 

It is easy to see that if we choose the weights in such a way that all sums 
Wi + wj with < i < j < 2 
are pairwise distinct, we obtain the following six isolated fixed points in P : 

2 2 2 

z 0> Z Z 1: z z 2i z li z l z 2i z 2- 

It remains to find the fixed point on the fiber of ir : B — > P 5 over each fixed 
point in P 5 . If A G {zqZi, zo z 2, z i z 2}, then it" 1 (A) has just one point. For example, 
7r _1 (zo^i) = ( z o z i, z 2)- Here we put Zi for the dual basis. 

Take A e {z$, zf, z|}, say A = Zq. Recall that the exceptional divisor of the 
blowup is E := P(7V) where N — A/yP 5 stands for the normal bundle. We have 
an explicit description for M see [If, Proposition 4.4.]. Notation as in (4, p. 2) with 
k = I , n — 2, we have 

A/VP 5 = Op 2 (2) ® Sym 2 (r v ). 
The fiber of Op 2 (2) (resp. Sym 2 (T v )) over zq is the dual space (ip) (resp. (zf, Z\Z2, 
z|)). Thus we get 

n-\zl) = E 4 = P«i 2 > ® {zl, Zl Z2,zl)). 

We see there are three fixed points in the fiber of each fixed point A € V. For 
A = Zq these points are 

Zq ® Zj, Zq ® Z 1 Z 2 ,Zq <g) Z\. 

Summarizing, we have twelve fixed points in B: 
(f ) (ziZj, ifc) with < i < j < 2; k ^ these three lie off E; 
(2) (z 2 , zf ® z jZk ) with j, k ^i;j< k; 
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(3) {zf,z}®z]) with i^j. 

Next we compute the fibers of £ over each type of fixed point. Suppose that 
B G B is a fixed point. The strategy is to take a curve B(t) G B such that 

lim B(t) = B 

and such that A(t) := n(B(t)) G P 5 is a curve of smooth conies for t ^ 0. Therefore 
£b will be obtained as the limit of £_B(t) = M-A(t)i 

\\mM A[t) = £ B - 

This enables us to use the well known space of vector fields of degree d that leave 
invariant a smooth conic C = Z(G) (see [3]). This space is 

(*) {Fii&i ~ H^i) I Fij G 

modulo multiples of the radial vector field. 

We will adopt the following notation: for each subset J := {vo, ■ ■ ■ ,Vk} C 
{z , zi,z 2 } we set 

M m {J) = K\ V, ■ , vf}, 
the canonical monomial basis of Sym m ( J). We write simply M m for M m ({zo, z\, z 2 }). 

Set Xi : j := — Zj<9j. Notice this is a vector of weight 0, since t ■ Zi = t Wi Zi 
whereas t ■ di = t~ Wi d{. 

We now describe suitable 1-parameter families of smooth conies abutting each 
type of fixed point. 

(1) B\ = ZqZ\. We take A(t) = Z0Z1 + tz 2 G P 5 . Using the characterization (4k) we 
obtain that the space M-ah) °f vector fields leaving A(t) invariant is given by 

{F 10 (zid! - z do),F 20 (z 1 d 2 - 2tz 2 d ), F 2 i{z d 2 - 2tz 2 di) \ F tj e S d -i}- 

Taking limit as t — > 0, we find a basis for £b 1 ■ 

{F 1 X , 1 ,F 2 d 2 I F 1 e M d _! , F 2 e M d \ {z 2 d }}, 

Clearly this basis consists of T-eigenvectors. 

(2) B 2 = (zq, Zq ® ziz 2 ). In this case, we take A{t) = Zq + tz\z 2 . With the same 
procedure as above, we obtain the following basis (of eigenvectors) for £b 2 ■ 

{F 1 z d 1 ,F 2 z d 2 ,F 3 X li2 I F U F 2 G M d _i , F 3 G M d _i({zi,3»})}. 

(3) i?3 = (zq, Zq® Zi). In this case a curve of smooth conies that approximates -B3 
is A{t) = Zq + tz\ + t 2 z\. As before, we obtain the following basis of eigenvectors 
for £b 3 - 

{FxZo^Frfz I Fi G M d _j , F 2 G M d \ {z 2 d }}. 

In order to handle the denominator in Bott's formula (9) we obtain, for each fixed 
point B, a base consisting of eigenvectors of TgB. 

If B £ E then T B B ~ T 7r(B) P(S" 2 ). For example, for B x = z zi we have 

T Bl M ~ (z zi) v ® (z„, z z 2 , Zi, Z1Z2, z|)- 
If B 6 E, then £? = (A, [v]) with A G V and v G A/k, w^O. Now 

T B B = T A V © Hom((w>, t-4) © («) 
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as C*-modules. For B 2 = (zq, Zq ® Z1Z2) we have: 

T B2 B = T Z 2Y © {zl © ziz 2 ) v ® {zl © z\, l\ ® z\) © {z\ ® z x z 2 ) 
where T Z 2W = (zq) v © {zqZ\, z z 2 ). Similarly, for S3 = (zq, Zq V © zf) we have 

r B ,B = T z 2 o Y © {zl y ®z\) y ® (zq V ® Z1Z2, Zo V ® «i) © (^o V ® *?)• 

The explicit calculation in Bott's formula is better left for a script (see §5). 
Finally we use Lemma 3.7 below which enables us to restrict the computation 
just for the first sixteen values of d = 2, . . . , 17 and then interpolate the answers 
obtained. 

□ 

3.7. Lemma. The sum in the right hand side 0} Bott's formula 



sU£(d) B ) n [B] 



is a combination of w[s with polynomial coefficients in d of degree < 15. 

Proof. For each fixed point B let • . • , £ m (d)(d)} denote the set of weights of 

£(d)s- Since sJ(£(d)B) is a polynomial in {c^(f(d)s) | k = 1, ... ,5} it's enough 
to prove that each 

Cfc (£ (d) B ) = o- k (€i(d), . . . ,£ m ( d )(<0) 

is a combination of ii^s with polynomial coemcients in d of degree < 3fc. 
Recalling Newton's identities 

kcr k = Si=i(-l) i+ Vfc-iPt 

where 

we see that it suffices to prove that Pk(£i{d), . . . , £, m (d){d)) is a combination of w^s 
with polynomial coefficients in d of degree < k + 2. 

On the other hand, a careful analysis of the weights appearing in the basis of 
£{d)s at each fixed point shows that these weights can be separated into sets of 
the form 

{weights of M e (J)} or {weights of M e (J)} + w 

where it; is a (fixed) combination of u^s; e = d, d — 1 and J = (2:0,21,2:2) or 
J = (zi, zj), i 7^ j. From this the reader may convince her(him)self that it's enough 
to prove the following 

Claim: Let m = m(d,n) := and {£ n ,i(e0, ■ • • , £n,m(d)} be the weights 

associated to the basis M c i({zq, . . . , z n }) of Sym d ((zo, . . . , z n )). Then 

rn 

Pk(d) : Y^C„.Adf 

?:=i 

is a combination of w^s with polynomial coefficients in d of degree < k + n. 

To prove the claim we proceed by induction on n > 1 and on k > 0. 
For n = 1, 

Af d ({z , Zi}) = {z d , ^-^i, . . . , z z? _1 , z?} 
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so that m(d, 1) = d+ 1. We have 

d+1 d 

Pk(d) = ££i,i(d) fc = ]T^ + (d - i) Wl ) k 

d d k 



i=0 i=0 3 = 1 



( k )(d Wl ) k - j (w - Wl yJ2 ij 

3 = 1 i=0 



The sum X)i=o ^ * s polynomial in d of degree j + 1, therefore p\{d) is a polynomial 
in d of degree < k + 1. 

For fc = 0, we have (d) = m(d, n), a polynomial in d of degree n. 

For the general case, decompose the basis Md{{zo, . . . , z n \) as the union 

z M d _i({z , ■ ■ • , *„}) U «iAfd_i({«i, . . . , z n }) U z 2 A/ d _i({z 2 , ■ ■ • , z n }) U • • • U {z^}. 
Then the weights are: 

WQ + {ZnAd ~ 1)} U»l + {£n-l,i(d - !)> U W 2 + {£n-2,i(d - 1)} U • • • U {d W „}. 

Hence we can write 

m(d,n) m{d—l,ri) 

pUd) = £ (e n ,,(d)) fc = E k + ^i(d - i)) fe + 

i=l i=l 
m(d— l,n— 1) m(d— l,n— 2) 

E (*"! +fn-l,i(d- I))* + E (w2+en-2, l (d-l)) fe + '-- + (du; n ) fc 
i=l i=l 

j=o i=o 
/,■ 



J=0 



A 



By induction we conclude that p r ^(d) — p%(d — 1) is a polynomial in d of degree 
< k + n — 1, and this implies that p^(d) is a polynomial in d of degree < k + n. 

□ 

4. Comments 

Using the varieties of complete quadrics of any dimension in P ra (see [11]) it is 
possible to find a compactification of the space of dimension one foliations in P™ 
that leave invariant a smooth quadric. 

For example, in the case of conies in P 3 we obtain the following. 

4.1. Theorem. Let Y denote the closure in ¥ N of the variety of dimension one 
foliations in P 3 that have an invariant smooth conic. The degree of Y is given by 

^(d - l)d [207d 14 + 2763d 13 + 15447d 12 + 54395d n + 114847d 10 + 

207891d 9 + 256737d 8 + 225801d 7 + 164937d 6 + 182101d 5 + 38993d 4 + 

316221d 3 + 248856d 2 - 118908d - 332640] 
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and its codimension is equal to 4(d — 1). 

For invariant quadric surfaces in P 3 wc find: 

4.2. Theorem. Let Y denote the closure in ¥ N of the variety of dimension one 
foliations in P 3 that have an invariant quadric. The degree of Y is given by 

^yr(d - l)d(d + f ) [d 2i + 81d 23 + 31 51d 22 + 77949d 21 + 1369333d 20 + 

18084843d 19 + 185031133d 18 + 1481854743d 17 + 9251138050d 16 + 44737976160d 15 + 

168507293704d 14 + 503603726976d 13 + 1212870415960d 12 + 2353394912904d u + 

3628929239056d 10 + 4249158105672d 9 + 3232639214668d 8 + 413912636928d 7 - 

2874493287072d 6 - 3885321416832d 5 - 1115680433472d 4 + 4477695012864d 3 + 

8264265366528d 2 + 8139069775872d+ 4334215495680] 

and its codimension is equal to (d — l)(d + 5). 

5. SCRIPTS 

The script below uses Schubert [8] to compute the formula for the degree of the 
variety of 1-dimcnsional foliations of degree d in P™ with some invariante fc-plane. 
with(schubert) ; 
deg:=proc(k,n) local Ec,SrE,F; 
grass (n-k,n+l , c) ; 
Ec:=dual((n+1)-Qc) ; 
SdE:=Symm(d,Ec) ; 
F : =SdE*Qc ; 

integral(chern(DIM,F) ) ;end; 
#example 

factor (deg(l , 2) ) ; #l/8*d* (d+3) * (d+2) * (d+1) 

5.1. Singular script. The calculations for Bott's formula uses Singular [6]. 

//download from www.mat.ufmg.br/~israel/Projetos/myprocs.ses 
//save and load 

<"myprocs . ses" ; //more procedures; save and load 
//Sum fractions 

proc sumfracdist ab.list cd){ 
def 1= (ideal(ab[l]*cd[2]+ab[2]*cd[l] , 
ab [2] *cd [2] ) ) ; def p=gcd(l [1] ,1 [2] ) ; 
return(list(l[l]/p,l[2]/p)) ;} 

//Subtract fractions 

proc subfrac(list ab.list cd){ 

def 1= (ideal(ab[l]*cd[2]-ab[2]*cd[l] , 

ab[2]*cd[2] )) ;def p=gcd(l[l] ,1[2] ) ; 

return(list(l[l]/p,l[2]/p)) ;> 

//Multiply fractions 

proc mulfrac(list ab.list cd){ 

def 1= ideal (ab [1] *cd [1] , 

ab[2]*cd[2]) ; 

def p=gcd(l[l] ,1[2]); 

return(list (1 [1] /p , 1 [2] /p) ) ; } 

//Inverse of a fraction 
proc invfrac(list ab){ 
return(list (ab [2] , ab [1] ) ) ; } 

//Divide a fraction 

proc divfrac(list ab.list cd){ 

return (mulf rac(ab, invf rac (cd) ) ) ; } 
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//If vs is a poly then return its monomials, 

//else return the degree d monomials 

proc mon(vs.d) 

{if (typeof (vs)=="poly" ) { 

def vvs=pol2id(vs) ; } else {def vvs=vs;} 

return(vvs~d) ;} 

//Compute f~k 

proc pot(f,k){def p=f ; 

for(int i=l ; i<=k-l ; i++){p=reduce (p*f ,mt) ;} 
return (p) ; } 

//Substitute the weights by given values P [i] 
proc pesos (H){ //H= poly or list 
list res; 

def mm=matrix(vars (1 . . (nvars (baser ing) ) ) ) ; 
def ty@=typeof (H) ; 
if (ty@=="poly"){ 

for(int i=l;i<=size(H) ;i++){ 
def i_=H[i]; def iv=leadexp(i_) ; res [i] = (mm*iv) [1 , 1] ; } 
return (mymapn( ideal (x(0 . .n) ) , ideal (P [1. .n+1]) ,res)) ;} 
else{if (tyQ=="list" and size(H)==2) { 
def num,den=H[l . .2] ; 
res=pesos (H [1] ) ; def denn=pesos (den) ; 
for(int i=l ; i<=size (res) ; i++) { 
res [i] =res [i] -denn[l] ;} 
return(res) ; } 
else{if(ty@==" ideal") 
{res=pesos (H [1] ) ; 

for(int i=2; i<=size (matrix(H) ) ; i++) { 
res=res+pesos (H [i] ) ; } 
}return(res) ; }}} 

//Symmetric functions in the weights of H 
proc cherns(H){ 
poly sigma= 1; 

for (int j=l ; j<=min(rk, size(H) ) ; j++) { 
sigma=reduce ( (1+H [j] *t) *sigma, std(t~ (d+1) ) ) ; } 
kill j;def j=coeff s(sigma,t) ; 
while (size(j)<d+l){ 

j=transpose(concat(transpose(j) , [0] )) ;} 

return(ideaKj) ) ; 

} 

/ /Interpolation 

proc interpola(lista){ 

//list (list (a, b) ,list(c,d) , . . ) 

def s=size (lista) ; 

if (s>l) { 

for (int j= 2;j<= s;j++){ 
poly f=l; 

for (int i = l;i<= j;i++){ 

f=f*(t-lista[i] [1]) ; } 

if (gcd(f ,diff (f ,t))==l) { 

poly g=0;for(i= l;i<=j;i++){ 

def p=f/(t-lista[i] [1] ) ; 

g =g +lista[i] [2] / 

subst (p , t , lista [i] [1] ) *p ; } 

int ii; 

for(i=l;i<=s;i++){ 

if (subst (g,t, lista[i] [1] )<>lista[i] [2] ) 
{ii++;>} 

see(j ,ii,s,deg(g)) ; 

if (ii==0){ break;}} 

else {ERROR ("WRONG DATA1") ; }} 

if (deg(g)==s-l){print(g) ;return("work harder");} 
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else { 

print (myf act (g) ) ; 
return(g) ;}} 

else {ERROR ("WRONG DATA2") ; }} 
//end of procedures 

//load dimension of P~n 
int n=2 ; 

//dimension of conies in P~2 

int d=(n+3)*n/2;kill r; 

ring r=(0) , (x(0. .n) ,t ,c(l . .d)) ,dp; 

def mt=std(t~(d+l)) ; 

//d-Chern class 

def S(d)=summ(seq("c(i)*t~i" , l,d)) ; 
//d-Segre class 

poly p; for(int i=l ; i<=d; i++) { 
p=p+(-l)~i*pot(S(d) ,i) ;} 
S(d)=p;def p=coef (S(d) ,t) ; 
def S(d)=row(p,2) ;kill p; 
S(d)=S(d) [d. .1] ; 

//give values to the weights 
intvec P=0,l,3; 

1 11 orr(3,n+l , "P [i]=random(2, 15) ") ; 
def xx=ideal (x(0 . .n) ) ; 
poly xxs=summ(seq("x(i) " ,0,n)) ; 
list sfs; 

sf s [2] =summ (mon (xxs , 2) ) ; 

//Define lists TP5,TB=tangent of \B,TV,NV=Normal bundle to the Veronese 
//in each fixed point, and find c_{d}-(T\B) = product of the weights, 
list TP5,TV,NV,TB; 
forr(l,size(sfs[2]) ," 

def a=sfs[2] [i] ; 

TP5[i]=list(sfs[2]-a,a) ; 
//test if a is of the form Z_{0>~2 or Z_{0}Z_{1} 

def b=radical(a) ; 
//if a is of the form Z_{0}-~2 

if (b[l]Oa) 
{def p=list(xxs-b[l] ,b[l]) ; 

TV[size(TV) + l]=p; 

def q=subfrac(TP5 [i] ,p) ; 

NV[size(NV) + l]=q; 
//For each vector of NV 
for(int j=l; j<=size(q[l] ) ; j++){ 
// Do the sum TV+0_{N} (-1) 
def jj=list(q[l] [j] ,q[2]); 
def TT=sumf rac (p , j j ) ; 
//Obtain TB 

TT=sumf rac(TT,divf rac (subf rac (q,jj) .jj)) ; 

//Save in the list TB the fixed point and the d-Chern class 

TB [size (TB)+l]=list (list (b[l] , j j) ,prod (pesos (TT) ) ) ; 

}} 

//if a is Z_{0>Z_{1} then TB=TP5 
{TB[size(TB)+l]=list(a,prod(pesos(TP5[i] ))) ;} 
"); 

list respostas; 

//compute the weights of \widetilde{\N} 
//in the fixed points for d=2 . . 17 
//to do interpolation. 
// dd is the degree of the foliation 

for (int dd=2;dd<=17;dd++){ 

int rk=int ( (n+1) *binomial(dd+n,n) 

-binomial (dd+l+n, n) ) ; 

sfs [dd] =summ(mon(xxs ,dd) ) ; 

sfs [dd-1] =summ(mon(xxs ,dd-l) ) ; 

poly NN; 
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for(int ii=l;ii<=size(TB) ;ii++) { 
def p=TB[ii] [1] ; 

//the fixed point, can be list (in E) 

// or poly (not in E) if the point is not in E 

if (typeof (p)=="poly") { 

//convert product in summ, in order to 

//obtain the factors 

p=dotprod(leadexp(p) ,xx) ; 
//obtain the factors 

def a=p[l] ;def al=p-a; 
def z=xxs-a-al ; 

//Using the basis found in the text 

//compute the weights of 

// the fiber of \widetilde{\N} 

def W=pesos(list (sf s [dd] -z~dd,z) )+pesos (sf s [dd-1] ) ; 

//symmetric functions in the weights, 

//with given values! 

//i.e. c_{i}~T(\widetilde{\N}) 

W=cherns(W) ; 

//substitute, in s_{5}, c(i) by the 
//values c_{i}~T(\widetilde{\N» 

def NUM=subst(S(d) [d] ,c(l) ,W[1] [2] ) ; 

for(int i=2;i<=d;i++){NUM=subst(NUM,c(i) ,W[1] [i+l]);> 

//Do the summ of the Bott ' s formula 

NN=NN+NUM/TB [ii] [2] ;> 

//If the point is in E, p is a list 

else{def p=TB[ii]; def a=p[l][l]; def z=p [1] [2] [1] ; 

//convert prod in summ 

z=dotprod(leadexp(z) ,xx) ; 

//test if a is of the form q_{2} or q_{3} 

//if a is of the form q_{3} 

if (size (z)==l) {z=leadmonom(z) ; def w=xxs-a-z; 

//Using the basis found in the text compute the weights of 

// the fiber of \widetilde{\N} 

def W=pesos (list (sf s [dd] -w~dd,w) )+pesos (list (a*sf s [dd-1] , z) ) ; 
//symmetric functions in the weights, with given values! 

W=cherns(W) ; 

//substitute c(i) in s_{5} by the values c_{i}-~T(\widetilde{\N}) 

def NUM=subst(S(d) [d] ,c(l) ,W[1] [2] ) ; 
f or (int 

i=2;i<=d;i++){NUM=subst(NUM,c(i) ,W[1] [i+1] ) ;} 

//Do the sum in Bott's formula: 
NN=NN+NUM/TB [ii] [2] ;}//matches z=leadmon(z) 

//If a is of the type q_{2}: 
else{def zl=z [1] ; z=z [2] ; 

//Using the basis found in the text compute 
//the weights of the fiber of \widetilde{\N} 

def W = pesos (list (a*sfs [dd-1] ,z) )+ 

pesos (list (a*sfs [dd-1] ,zl) )+pesos(mon(xxs-a,dd-l) ) ; 

W=cherns(W) ; 

def NUM=subst(S(d) [d] ,c(l) ,W[1] [2] ) ; 

for(int i=2;i<=d;i++){NUM=subst(NUM,c(i) ,W[1] [i+1]) ;> 
NN=NN+NUM/TB [ii] [2] ;>}} 

//Save in respostas the values obtained for each degree 

respostas [size (respostas) +1] =list (dd.NN) ; } 

//Interpolate the list respostas 
interpola(respostas) ; 
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